Những câu hỏi liên quan
Quỳnh Anh
Xem chi tiết
N           H
11 tháng 11 2021 lúc 22:25

A

Bình luận (0)
Quỳnh Anh
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 11 2021 lúc 23:50

Chọn A

Bình luận (0)
Yen Phuong Duong
Xem chi tiết
N           H
19 tháng 10 2021 lúc 14:23

Hỏi đáp Tin học

Bình luận (0)
N           H
19 tháng 10 2021 lúc 14:24

Input: số nguyên N

Output: N là chẵn hoặc N là lẻ

- Thuật toán liệt kê:

+ Bước 1: Nhập N

+ Bước 2: Nếu N chia hết cho 2 thì in ra N chẵn và kết thúc thuật toán ngược lại nếu N không chia hết cho 2 thì in ra N lẻ và kết thúc thuật toán

- Thuật toán sơ đồ khối:

 

Hỏi đáp Tin học

 

 

 

 

Bình luận (0)
Tạ Minh Quân
Xem chi tiết
Lê Nguyễn Hữu Vinh
7 tháng 1 2022 lúc 11:24

C++: 

#include<iostream>

using namespace std;

int main() {

int n;

cin >> n;
//a)

if (n % 5 == 0) {

return true;

} else {

return false;

}

//b)

if (n > 0) {

return true;

} else {

return false;

}

return 0;

}

Bình luận (0)
 Khách vãng lai đã xóa
XitsuKata
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 12 2022 lúc 13:52

Cau 1:

Câu 2:

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n>0 && n%5==0) cout<<"Phai";

else cout<<"Khong phai";

}

Bình luận (0)
Hân Chướng
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 12 2021 lúc 8:43

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n%2==0) cout<<"YES";

else cout<<"NO";

return 0;

}

Bình luận (0)
Thế Long
Xem chi tiết
Luân Đào
1 tháng 1 2021 lúc 15:59

var n,i,k,d: integer;

a:array[1..52] of integer;

begin

write('Nhap so N: '); readln(n);

for i:=1 to n do

begin

write('a[',i,'] = '); readln(a[i]);

end;

write('Nhap so k: '); readln(k);

d:=0;

for i:=1 to n do

if a[i] mod k = 0 then d:=d+1;

writeln('Co ',d,' so chia het cho ',k,' trong day');

if d mod 2 = 0 then writeln('Chan') else writeln('Le');

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
2 tháng 1 2021 lúc 9:20

uses crt;

var a:array[1..52]of integer;

i,n,k,dem:integer;

begin

clrscr;

repeat

write('Nhap n='); readln(n);

until (0<n) and (n<=52);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

write('Nhap k='); readln(k);

dem:=0;

for i:=1 to n do  

  if a[i] mod k=0 then inc(dem);

writeln('Trong day co ',dem,' so chia het cho ',k);

if dem mod 2=0 then writeln('So luong so chia het cho ',k,' la so chan')

else writeln('So luong so chia het cho ',k,' la so le');

readln;

end.

Bình luận (0)
NGUYỄN HUỲNH NHƯ Ý
Xem chi tiết
Nguyễn Quốc Đạt
4 tháng 10 2023 lúc 19:47

Bài 1:

Program HOC24;

uses crt;

var n: integer;

begin

clrscr;

write('Nhap N: '); readln(n);

if n mod 2 = 0 then write(n,' la so chan') else write(n,' la so le');

readln;

end.

Bài 2:

Program HOC24;

uses crt;

var n: integer;

begin

clrscr;

write('Nhap N: '); readln(n);

if n = sqr(trunc(sqrt(n))) then write(n,' la so chinh phuong') else (n,' khong phai la so chinh phuong');

readln;

end.

Bình luận (0)
le xuan quy
29 tháng 9 2023 lúc 21:49
void solve(int n) {    if(n%2 == 0) {        cout << "CHAN'\n";    } else cout << "LE\n";    // kiem tra chinh phuong    int i = 2;    while(i*i <= n) {        if(i*i == n)  {            cout << "LA SO CHINH PHUONG\n";            return;        }    }    cout << "KHONG PHAI LA SO CHINH PHUONG'\n"; }
Bình luận (0)
Le thi huong
Xem chi tiết
Kiều Vũ Linh
10 tháng 5 2023 lúc 19:13

Câu 58:

Var n:integer;

Begin

Write('n = ');readln(n);

If n mod 2 <> 0 then write(n,' la so le')

Else write(n,' khong la so le');

Readln

End.

Bình luận (0)
Kiều Vũ Linh
10 tháng 5 2023 lúc 19:14

Câu 61:

Var n:integer;

Begin

Write('n = ');readln(n);

If n mod 2 = 0 then write(n,' la so chan')

Else write(n,' khong la so chan');

Readln

End.

Bình luận (0)
Nguyễn Thị Yến Nhi
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 1 2022 lúc 21:58

uses crt;

var n:longint;

begin

clrscr;

readln(n);

if n mod 2=0 then writeln('co')

else writeln('khong');

readln;

end.

Bình luận (1)